10 REM         ATOMIC HANDBALL
15 REM
20 REM          FRANK LINDSEY
25 REM          BOWLING GREEN
30 REM          KENTUCKY, USA
35 REM          (502)781-3117
40 REM
45 REM LET'S HEAR IT FOR FREE SOFTWARE!
50 REM
55 REM LET'S ALSO HEAR IT FOR MAKING A
60 REM BUCK. WATCH FOR MY OTHER COMMER-
65 REM CIALLY AVAILABLE PROGRAMS.
70 REM
75 PRINT"[147][142]":POKE53280,6:POKE53281,6
80 PRINT"":GOSUB200
85 PRINT"                   BY"
90 PRINT"             FRANK LINDSEY"
95 PRINT"          INSTRUCTIONS?[160](Y/N)
100 [151]646,K:K[178]K[170]1:[139]K[178]16[167]K[178]0
105 [141]200:[161]A$:[139]A$[178]""[167]100
110 [139]A$[178]"N"[167]195
115 [153]"LOAD   RIGHT$N THE YEAR 2040 ALL MAJOR SPORTS
120 PRINT"   HAVE BEEN REPLACED BY THE EXCITING
125 [153]"           ATNTOMIC LEFT$ANDBALL!
130 PRINT"  [201]N THIS YEAR HANDBALL HAS EVOLVED TO
135 [153]"  THE POINT THAT, INSTEAD OF A RUBBER
140 PRINT"  BALL, THE GAME IS PLAYED WITH A MUON
145 [153]"  BALL THAT CAN ONLY BE DEFLECTED WITH
150 PRINT"AN ELECTRON PADDLE.  [211]UBATOMIC PARTICLES
155 [153]"MUST BE DESTROYED FOR POINTS BY CONTROL
160 PRINT"OF THE JOYSTICK IN PORT #2.  [208]RESS THE
165 [153]" FIRE BUTTON TO SERVE, AND CHR$(null)(null)STR$ (null)(null)LEN(null)!
170 PRINT"       ([208][210][197][211][211][160][193][206][217][160][203][197][217][160][212][207][160][194][197][199][201][206])
175 K[178]0
180 [151]646,K:K[178]K[170]1:[139]K[178]2[167]K[178]0
185 [129]L[178]0[164]30:[130]:[153]"ATNTOMIC LEFT$ANDBALL"
190 [161]A$:[139]A$[178]""[167]180
195 [153]"RETURN":[158]3580
200 [153]""
205 [153]"         (null)(null)(null)
210 PRINT"        [206] [205][205][205]
215 [153]"       (null)   (null)(null)(null) TANTANRIGHT$TANTAN(null)TANRIGHT$(null)RIGHT$(null)RIGHT$ = (null)TANRIGHT$
220 PRINT"      [206][192][192][192][192][192][205][205][205]  [221]  [221] [221][221][202][203][221] [221] [221]
225 [153]"     (null)       (null)(null)(null) >  MID$TAN(null)>  > > MID$TAN(null)
230 PRINT
235 PRINT"    [221]   [221][221][221]
240 [153]"    (null)   (null)(null)(null)
245 PRINT"    [171][192][192][192][179][221][221] [213][192][201] [213][201][178] [178][201] [178][201] [213][192][201] [178]  [178]
250 [153]"    (null)   (null)(null)(null) -TAN< (null)(null)(null) (null)(null) (null)RIGHT$ -TAN< (null)  (null)
255 PRINT"    [221]   [221][221][221] [177] [177] [177][202][203] [177][203] [177][203] [177] [177] [177][192][189][177][192][189]
260 [142]